5 POKE55,0:POKE56,144:CLR:POKE198,0 6 DV=PEEK(186):IFDV<8THENDV=8 10 DIMF$(9):FORI=1TO9:READF$(I):NEXT 20 DATA 1040,1040A,1040EZ,SCHA,SCHC,SCH SE,8606,READER C800,HELLO CONNECT 30 DIMM$(9):FORI=1TO9:READM$(I):NEXT 35 DATA " 1040 " 36 DATA " 1040[193] " 37 DATA " 1040[197][218] " 38 DATA " [211]CHEDULE [193] ([196]EDUCTIONS) " 39 DATA " [211]CHEDULE [195] ([194]USINESS) " 40 DATA " [211]CHEDULE [211][197] ([211]HORT [198]ORM) " 41 DATA " [198]ORM 8606 ([201][210][193]S) " 42 DATA " [201]NSTRUCTIONS " 43 DATA " [204][207][193][196][211][212][193][210] " 100 POKE53281,0:POKE53280,0:POKE53272,23:PRINT"[147][153]"; 110 GOSUB60000 300 SYS57812"I-MENU C000",DV,0:POKE780,0:POKE781,0:POKE782,192:SYS65493 305 PRINT"";:MM=49152 310 SYSMM,73,5,1,14,1,3,M$(1),M$(2),M$(3),M$(4),M$(5),M$(6),M$(7),M$(8),M$(9) 320 GETK$:K$=STR$(ASC(K$)-48):K=VAL(K$) 325 F$=F$(K) 330 ONKGOTO400,400,400,400,400,400,400,1000,400 340 GOTO310 350 : 400 FORI=0TO10:POKE781,I:SYS59903:NEXT:PRINT 401 SYS57812"I-PRG 9000",DV,0:POKE780,0:POKE781,0:POKE782,144:SYS65493 402 SYS57812"GETWORD C000",DV,0:POKE780,0:POKE781,0:POKE782,192:SYS65493 403 SYS57812"NOTEPAD C400",DV,0:POKE780,0:POKE781,0:POKE782,196:SYS65493 404 SYS57812"HARDCOPY CA00",DV,0:POKE780,0:POKE781,0:POKE782,202:SYS65493 405 SYS57812"READHELP CB00",DV,0:POKE780,0:POKE781,0:POKE782,203:SYS65493 406 A$=F$:OPEN15,DV,15,"R0:"+A$+"="+A$:INPUT#15,ER:CLOSE15 410 IF ER<>63 THENPRINT"[147]":END 411 Q$=CHR$(34):POKE646,PEEK(53281) 420 PRINT"LOAD"Q$A$Q$","DV 430 PRINT"RUN":POKE631,13:POKE632,13:POKE198,2:END 1000 SYS57812"READER C800",DV,0:POKE780,0:POKE781,0:POKE782,200:SYS65493 1004 SYS51200,"TAX.INSTR","[212]AX [193]CCOUNTANT" 1007 GOTO305 1010 : 10000 OPEN15,8,15,"S0:TAX BOOT":CLOSE15:SAVE"0:TAX BOOT",8:END 10100 : 60000 PRINT"[147]":Z$=" [152] ":POKE214,10:PRINT 60010 PRINT" [155][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184]":FORI=0TO11:PRINTZ$:NEXT 60011 Q$=CHR$(34):POKE646,PEEK(53281) 60020 PRINT" [151][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][152]" 60030 Z$(0)="[212] [193] [216] [193] [195] [195] [207] [213] [206] [212] [193] [206] [212]":Z$(1)="BY [194]ARBARA [211]CHULAK 60040 Z$(2)[178]"(null)1.0 (LEN) 1992 BY (null)OFTDISK, RIGHT$NC."[170][199](13) 60050 Z$(3)[178]"(null)HIS PROGRAM IS THE COPYRIGHTED WORK 60060 Z$(4)="OF [211][207][198][212][196][201][211][203] [208][213][194][204][201][211][200][201][206][199]. [201]T IS NOT" 60070 Z$(5)="SHAREWARE OR IN THE PUBLIC DOMAIN." 60080 Z$(6)="[208]LEASE REPORT ILLEGAL DISTRIBUTION" 60085 Z$(7)="OF THIS PROGRAM BY CALLING" 60090 Z$(8)="1-800-831-2694 OR 1-318-221-8718.":POKE214,12:PRINT 60100 FORI=0TO8:PRINTTAB(20-(LEN(Z$(I))/2))""Z$(I):NEXT:RETURN